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Abstract. We propose a method for encoding iterators (and recursion 
operators in general) using interaction nets (INs). There are two main 
appUcations for this: the method can be used to obtain a visual nota- 
tion for functional programs; and it can be used to extend the existing 
translations of the A-calculus into INs to languages with recursive types. 

1 Introduction 

The use of visual notations for functional programs has long been an active 
research topic, whose main goal is to have a notation that can be used (i) to 
define functional programs visually, and (ii) to animate their execution. 

In this paper we propose a graphical system for functional programming, 
based on token-passing INs [9] . The system offers an adequate solution for classic 
problems of visual notations, including the treatment of higher-order functions, 
pattern-matching, and recursion (based on the use of recursion operators). The 
system implements a call-by-name semantics, with a straightforward correspon- 
dence between functional programs and graphical objects. 

Most approaches to visual programming simply propose a notation for pro- 
grams. Program evaluation is animated by representing visually the intermediate 
programs that result from executing reduction steps on the initial program, using 
the operational semantics of the underlying functional language. Our approach 
is different in that we use a graph-rewriting formalism with its own semantics. 

The advantages of using INs for visual programming are: 

— Both programs and data are represented in the same graphical formalism. 

— Programs can be animated without leaving the interaction formalism. 

— Pattern-matching for external constructors is in-built. 

— Recursive definitions arc expressed very naturally as interaction rules involv- 
ing agents that are reintroduced on the right-hand side. 

But the interaction net formalism does not offer a satisfactory semantic inter- 
pretation for the behaviour of functional symbols. Moreover, many interaction 
net systems can be defined that do not have a functional reading. What is miss- 
ing is a clear correspondence between functional definitions and interaction sys- 
tems. In this paper we establish a correspondence between agents with "obviously 
functional" interaction rules and functions defined with recursion operators. 



2 The Token-passing Encoding of the A-calculus 



The token-passing encodings [9] use an interaction system where two different 
symbols exist for apphcation: one is the syntactic symbol @ introduced by the 
translation; the corresponding agents have their principal ports facing the root 
of the term and will be depicted by triangles. A second symbol @ exists that will 
be used for computation; to simplify the figures, the corresponding agents will 
be depicted by circles equally labelled with @. Their principal ports face the net 
that represents the applied function, to make possible interaction with A agents. 

The translation 7^p (•) encodes terms in the system (Z'tp,i?tp) where Stp = 
{4, @, @, A, c, £, S}. It generates nets containing no active pairs. The special sym- 
bol IJ. is used as an evaluation token: an agent IJ- traverses the net, transforming 
occurrences of @ into @. The evaluation rules involving IJ- can be tailored to a 
specific evaluation strategy. For call-by-name, i?tp consists of the following rules 
which comprises evaluation rules involving ij- and a computation rule involving 
@ and A. Management (copying and erasing) rules are omitted here. 




To start the reduction a -IJ- symbol must be connected to the root port of 
the term. Let -IJ-A^ denote such net; then the following correctness result holds: 
t JJ. z iff JJ-'^p {t) — %.p (^); where the evaluation relation • JJ- • is defined by 
the standard evaluation rules for call-by-name. 

The language used in this paper is the simply-typed A-calculus extended with 
natural numbers, booleans, lists, and iterators for these types. BNL is defined 
by the following syntax for terms {x, y range over a set of variables): 

t,u,v ::= X I Xx.t | t u | tt | f f | iterbool(t, u, u) | | suc(i) | \ternst{\x. t,u,v) 
I nil I cons(t, It) I iterlist(Aa::j/.t, u, u) 

3 A Token-passing Encoding of BNL 

We extend to BNL the token-passing call-by-name translation of the A-calculus 
into the interaction system (i7tp,i?tp). The novelty of this encoding is not the 
token-passing aspect, but rather the approach to recursion. 

We first consider data structures. In a token-passing implementation, there 
will be an interaction rule between the token agent and each constructor symbol 
that will stop evaluation. For BNL we define the system (-E'bnl, -Rbnl) where 
-^BNL consists of the symbols tt, ff, and nil with arity 0; sue with arity 1; 
and cons with arity 2. Each recursive program will be encoded in an interaction 
system specifically generated for it. This is a major novelty of our approach. The 
interaction system for the A-calculus will not be extended by introducing a fixed 
set of symbols; instead a new symbol will be introduced for each occurrence of 



a recursion operator, with an interaction rule for each different constructor, so a 
dedicated interaction system {S^,R^) is generated for each term t. This system 
is constructed by a recursive function = S{t), defined as: 

S{x)=S (tt) = S (ff) = 5 (0) = 5 (nil) = (0, 0) 

5 {Xx.t) = S (suc(t)) = S {t) 

S{tu) = 5(cons(t,M)) ^S{t)uS{u) 

S (iterbooKK J?, 6)) = {{\t^°^\ It^j'} U T, R,,b..i U i?), 

where (r, _R) = 5 (6) U 5 (V) U 5 (F). 
5 (iternat(Ax.S', Z, n)) = ({Itg^f , ltf|'} U i?|,Nat U R) 

where (r, i?) = 5 (n) U 5 (S) U 5_(Z) 
5 (iterlist(Axy.C, iV, 0) = {{\tc"N, ltc!?J} U E, ii^List U 7?) 

where {E, R) ^ S (I) U S (C) U 5 (A^) 




Iterator symbols are introduced in pairs (It ", It ") where the first symbol is 
used for syntactic agents and the second for computation agents (similarly to 
@,@). 

A BNL program t will be translated into a net defined in the system {St, Rt) = 
{Stp U Sbnl U Si, Rtp U i?BNL U i?^ ) where {Stp, Rtp) was defined in Section 2. 

Given a BNL program t, where t is iterbool(y, F, 6), \ternat{Xx. S, Z,n) or 
iterlist(Ax2/.C, A^, Z), then the net T (t) is given as follows. 




:rv(V'j FV{F) j-v(Ji.S) pv'r) n'.Z] TVi>.iy.Cj rv(.T) 



In token-passing implementations, all terms are translated as syntax trees. 
Syntactic iterator agents i arc turned into their computation counterparts i by 
token agents. A first key aspect of our approach is that the interaction rules of the 
(computation) iterator agents internalise the iterator's parameters. For instance 
the net T (iterlist(Aa;j/.C, N, cons(/i, t))) reduces to -IIT {C[h/x, iterlist(Ax?/.C, N, t)/y]). 

A second key aspect is that each such new symbol will have auxiliary ports 
in a one-to-one correspondence with the free variables in the iterator term. We 
end the section with a correctness result. The proofs can be found in [1]. 

Proposition 1. ("Correctnessj If t is a closed BNL term and z a canonical 
form, then: t JJ. z <^ JJ-T {t) — >* T {z). 

4 Conclusions and Future Work 

We have presented an approach to encoding in INs functional programs defined 
with recursion operators, and given the full details of the application of this ap- 
proach to the token-passing implementation of a call-by-name language, which 
results in a very convenient visual notation for this language. The approach can 
be easily extended to richer sets of recursive types and other recursion opera- 
tors and also to new strategics. The novel characteristics of the enc:oding are 
(i) the interaction system is generated dynamically from the program, and (ii) 
the internalisation of some of the parameters of the recursion operator in the 
interaction rules. With respect to previous work on encoding recursion in inter- 
action nets, fixpoint operators have been studied elsewhere for interaction net 
implementations [4,6], and we have shown elsewhere how a binding recursion 
operator (as in PCF) can be implemented in the token-passing setting [2]. 

A prototype system for visual functional programming has been developed, 
integrated in the tool INblobs [3, 10] for interaction net programming. The tool 
consists of an evaluator for interaction nets together with a visual editor and a 
compiler module that translates programs into nets. The latter module allows 
users to type in a functional program, visualize it, and then follow its evaluation 
visually step by step. The current compiler module automatically generates call- 
by-name or call-by- value systems. Additionally, a visual editing mode is available 
that allows users to construct nets corresponding to functional programs. In 
the current implementation there is no way to convert visual programs back to 
textual ones. 

The token-passing translation is not however very representative of most 
work in this area, which has concentrated on designing efficient translations; 
[5,7,8] are some samples. Let T(-) be one such translation. Typically T{tu) is 
constructed from T (t) and T (u) by introducing an application symbol @ with 
its principal port connected to the root port of T (t) . Our treatment of iterators 
can be adapted to this setting by removing the evaluator tokens and introducing 
the iterator agents with the principal port immediately facing the argument. 
When the iterated function is a closed term, a correctness result can be easily 
established. Let Xx.S be a closed term, then T(iternat(Aa;. 5,^,0)) — > ^(■^) 
and T (iternat(Aa;.6', Z,suc(n))) — > T {S[\ternat{Xx.S, Z,n)/x]) 
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